﻿
CREATE PROCEDURE [dbo].[CheckAllowUpdateDeleteForRecord]
(--Если запись создана не в текущем подразделении, то её нельзя изменять(удалять)
	@RecordId int
)
AS
DECLARE @intDepartmentId int, @strMsg nvarchar(500), @intErrCode int
	SET NOCOUNT ON;
SELECT @intDepartmentId = DepartmentId FROM PR.DepartmentOptions

IF cast(@RecordId / 100000000 as int) = @intDepartmentId SET @intErrCode = 0
ELSE SET @intErrCode = 1001

IF ( @intErrCode <> 0)
BEGIN
	IF @@trancount > 0 ROLLBACK TRANSACTION
	SELECT @strMsg = 'Запись с идентификатором ' + cast(@RecordId as varchar(10)) + ' можно изменять(удалять) только в подразделении с идентификатором ' + cast(cast(@RecordId / 100000000 as int) as varchar(10)) + ' !'
	RAISERROR (@strMsg, 11, 1)
END

RETURN @intErrCode
